home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 1999 #1
/
Amiga Plus 1999 #1.iso
/
System-Boost
/
Sound
/
AHI
/
Install_AHI
< prev
next >
Wrap
Text File
|
1998-07-30
|
76KB
|
2,581 lines
; $VER: AHI Install 4.13 (8.10.97)
; Description: Installer script for the AHI audio system (© 1996, 1997 Martin Blom).
; Done my Martin Blom, partly based on Teemu Suikki's install script.
; Public domain.
;
; $Id: Install\040AHI,v 4.13 1997/10/09 01:08:49 lcs Exp lcs $
; $Log: Install\040AHI,v $
; Revision 4.13 1997/10/09 01:08:49 lcs
; Added the language Hrvatski.
;
; Revision 4.12 1997/09/28 04:36:32 lcs
; Added Maestro Pro
;
(set #complete 0)
(set #completeadd (/ 1000 35)) ; There are 35 complete statements!
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(set #osversion (/ (getversion "exec.library" (resident)) 65536))
;**
;** All the strings
;**
(set #t_welcome (cat
" Welcome to the AHI installation. AHI is a retargetable"
" audio systems that can be used with both the built-in"
" sound chip (Paula) and several sound cards. This is version"
" 4."
))
(set #t_oldinstaller (cat
" You have an old version of the Installer. I'll probably"
" need version 43.3 or greater. You can continue anyway"
" but there is no guarantee it will work as it's supposed"
" to do.\n"
" Do you wish to continue anyway?"
))
(set #t_oldinstallerhelp (cat
" The version of Installer you use is too old. You can"
" find a more recent version on the Internet, for example"
" on Aminet, in the util/misc directory. The current"
" file name is \"Installer-43_3.lha\":\n"
" <URL:ftp://ftp.germany.aminet.org/pub/aminet/util/misc/Installer-43_3.lha"
))
(set #t_installaborted "Installation aborted.")
(set #t_installing "Installing ")
(set #t_installingdocs "Installing developer documentation")
(set #t_installingincs "Installing include files")
(set #t_installingsrc "Installing example source code")
(set #t_nofiles "No files to install.")
(set #t_nohelp "No help available.")
(set #t_parts "Which parts of AHI do you wish to install?")
(set #t_system "System files")
(set #t_prefs "Preferences program")
(set #t_audio "The AUDIO handler");
(set #t_userdoc "User's documentation")
(set #t_a-developer "Application developer files")
(set #t_d-developer "Driver developer files")
(set #t_userhelp (cat
"System files:\n"
" The system files. This is the heart of AHI and must be"
" if for any of the other components to work.\n\n"
"Preferences program:\n"
" The preference program. Can be used to change many options"
" in AHI. This part of AHI requires BGUI or MUI to be installed.\n\n"
"The AUDIO handler:\n"
" Allows you to play and record samples with the 'copy'"
" command.\n\n"
"User's documentation:\n"
" An AmigaGuide® file descibing the AHI audio system and"
" its components.\n\n"
))
(set #t_devhelp (cat
"Application developer files:\n"
" Autodocs, include files, example source code etc."
" Required if you wish to use AHI in your own applications.\n\n"
"Driver developer files:\n"
" Autodocs, example source code etc. Only required"
" if you plan to write hardware drivers for sound"
" cards.\n\n"
))
(set #t_gui (cat
" Which version of the preferences program would you like"
" to install?"
))
(set #t_guihelp (cat
" Please select which GUI system you prefer.\n\n"
))
(set #t_guibgui "BGUI version")
(set #t_guimui "MUI version")
(set #t_icon "Which icon do you want to install?")
(set #t_iconstd "Plain 4 colour icon")
(set #t_iconmwb "8 colour MagicWB icon")
(set #t_iconhelp (cat
" Select which icon you would like to use for the prefernces"
" program. The MagicWB icon was designed by Erol Ismael.\n\n"
))
(set #t_languages (cat
"Which languages do you want to install?"
" The built-in language is English."))
(set #t_languageshelp (cat
" If your language is not in the list, the author of AHI"
" would be very happy if you made a translation. Edit the files"
" User/Catalogs/ahi.ct and User/Catalogs/ahiprefs.ct"
" and send it to this address:\n"
" lcs@lysator.liu.se\n"
" It may be a wise move to ask first, just to make sure nobody"
" else is working on a translation to your language.\n\n"
))
(set #t_drivers (cat
"Which AHI drivers you want to install?"
" Do not install drivers for sound cards you don't have."))
(set #t_drivershelp (cat
"Delfina:\n"
" Delfina Classic/Lite sound card.\n\n"
"Filesave:\n"
" Read/Write sample data to a file.\n\n"
"Maestro Pro:\n"
" Maestro Pro sound card.\n\n"
"Melody MPEG:\n"
" Melody MPEG sound card.\n\n"
"Paula:\n"
" Regular Amiga sound hardware.\n\n"
"Prelude:\n"
" Prelude sound card.\n\n"
"Toccata:\n"
" Toccata sound card.\n\n"
"Wavetools:\n"
" Wavetools sound card.\n\n"
))
(set #t_CPUver "Which version of the binaries do you wish to install?")
(set #t_CPUverhelp (cat
" 68020-optimized binaries are much faster, and often also"
" smaller than plain 68000 versions. In the case of AHI,"
" the 68000 versions have less features and reduced sound"
" quality. It is strongly suggested that you use the"
" 68020 versions of the binaries.\n"
" The 68060 version avoids the slow 64 bit divisions. Don't"
" install this version unless you own a 68060 CPU!\n\n"
))
(set #t_devfiles "Which developer files do you wish to install?")
(set #t_devdocs "Autodocs and AHI Developer's Guide")
(set #t_source "Example source code")
(set #t_asm "Assembler include files")
(set #t_cgen "Generic C include files")
(set #t_e "E module files")
(set #t_fd "FD files")
(set #t_ade "Extra ADE gcc include files")
(set #t_sas "Extra SAS/C (and DICE) include files")
(set #t_storm "Extra StormC include files")
(set #t_devfileshelp (cat
"Autodocs and AHI Developer's Guide:\n"
" The autodocs and rules for programming AHI.\n\n"
"Example source code:\n"
" Some example programs, most of them are written in C, but"
" there are some assembler sources too.\n\n"
"Assembler include files:\n"
" Include files needed if you program in assembler.\n\n"
"Generic C include files:\n"
" Include files needed if you program in C.\n\n"
"E module files:\n"
" The module files to use with AmigaE.\n\n"
"FD files:\n"
" Can be used with the 'lvo' tool, or when you build a"
" hardware driver written in C.\n\n"
"Extra ADE gcc include files:\n"
" The special include files for gcc (inline, proto etc).\n\n"
"Extra SAS/C (and DICE) include files:\n"
" The special include files for SAS/C (pragmas, proto etc)."
" They work with DCC too, but with no tag calls.\n\n"
"Extra StormC include files:\n"
" The special include files for StormC (pragma, proto etc).\n\n"
))
(set #t_nodevs
"Cannot find the Devs: assign. Try a higher userlevel instead.")
(set #t_noc
"Cannot find the C: assign. Try a higher userlevel instead.")
(set #t_noprefs
"Cannot find the Sys:Prefs directory. Try a higher userlevel instead.")
(set #t_nol
"Cannot find the L: assign. Try a higher userlevel instead.")
(set #t_devspath "Where do you want to install the system files?")
(set #t_devspathhelp (cat
" The directory you select must be a part of your Devs: assign."
" The installer will copy ahi.device, the hardware drivers"
" and the audio mode description files to this directory."
" Subdirectories for the drivers and mode files will be"
" created.\n\n"
))
(set #t_cpath "Where do you want to install AddAudioModes?")
(set #t_cpathhelp (cat
" AddAudioModes is a small command line utility that can"
" be used to manipulate the database which contains the"
" audio modes (much like the screenmode database)."
" CLI programs are normally located in the C: directory.\n\n"
))
(set #t_localepath "Where do you want to install the catalogs?")
(set #t_localepathhelp (cat
" The directory you select must be a part of your Locale: assign."
" The installer will copy the catalogs you have selected to"
" subdirectories in this directory.\n\n"
))
(set #t_prefspath "Where do you want to install the preferences program?")
(set #t_prefspathhelp (cat
" The preferences program lets you configure AHI for your particular"
" configuration. You can select which sound hardware you prefer"
" to use, which physical inputs and outputs you wish to use"
" etc. Preferences programs are normally located in the"
" Sys:Prefs/ directory.\n"
" This program requires BGUI or MUI, depending on which version"
" you are installing.\n\n"
))
(set #t_audiohelp (cat
" The AUDIO handler is used to mount a device called AUDIO:. By"
" copying files to and from this device, you can play and record"
" raw sample data, IFF-AIFF or IFF-AIFC files.\n\n"
))
(set #t_lpath "Where do you want to install the AUDIO handler?")
(set #t_lpathhelp (cat
#t_audiohelp
" Handlers are normally located in the L: directory.\n\n"
))
(set #t_dosdevpath "Where do you want to install the AUDIO mount entry?")
(set #t_dosdevpathhelp (cat
#t_audiohelp
" Mount entries are normally located in the Devs:DOSDrivers"
" directory if they are to be mounted at boot time. If not, they"
" probably are in the SYS:Storage/DOSDrivers directory.\n\n"
))
(set #t_dosdriver "Do you want the handler to be activated at boot time?")
(set #t_dosdriverhelp (cat
" If you want, the AUDIO: device can be made avaliable as soon as"
" your system has been started. This saves you the effort of"
" having to mount it manually when you want to use it. It does"
" not require much memory to mount the device and it is therefor"
" suggested that you select 'Yes'.\n\n"
))
(set #t_userdocpath "Where do you want to install the user documentation?")
(set #t_userdocpathhelp (cat
" This is an AmigaGuide® file descibing the AHI audio system"
" and its components.\n\n"
))
(set #t_srcpath (cat
" Where do you want to install the example source code?"
" A directory called AHI will be created there."
))
(set #t_srcpathhelp (cat
" The example sources, in both C and assembler, will be"
" stored in a subdirectory called AHI. Any files currently"
" present in the AHI directory will be deleted!\n\n"
))
(set #t_oldsrc (cat
" There is already a directory called AHI here."
" All files in it will be deleted."
))
(set #t_devdocspath " Where do you want to store the developer documentation?")
(set #t_devdocspathhelp (cat
" The installer will place the autodoc files and the"
" AHI Developer's Guide in the directory you select.\n\n"
))
(set #t_aincpath " Where are your assembler include files located?")
(set #t_aincpathhelp (cat
" The installer will place the assembler include files"
" in subdirectories (lvo, devices and libraries)"
" of the one you select.\n\n"
))
(set #t_fdpath " Where do you keep your FD-files?")
(set #t_fdpathhelp (cat
" FD-files are files describing a library's or a device's"
" functions. They can be used with the 'lvo' program, and"
" can also be useful if you write hardware drivers.\n\n"
))
(set #t_cincpath " Where are your C include files located?")
(set #t_cincpathhelp (cat
" The installer will place the generic C include files"
" in subdirectories (clib, devices and libraries)"
" of the one you select.\n\n"
))
(set #t_emodpath " Where are your E module files located?")
(set #t_emodpathhhelp (cat
" The installer will place the E module files in the directory"
" and in subdirectories (devices and libraries)"
" of the one you select.\n\n"
))
(set #t_adeincpath " Where do you want to place the ADE gcc include files?")
(set #t_adeincpathhelp (cat
" gcc needs some extra files to find out which registers"
" to use when calling AHI functions. That information is"
" located in these files, which will be copied to the"
" inline, pragmas and proto directories.\n\n"
))
(set #t_sasincpath " Where do you want to place the SAS/C (and DICE) include files?")
(set #t_sasincpathhelp (cat
" SAS/C (and DICE) needs some extra files to find out which registers"
" to use when calling AHI functions. That information is"
" located in these files, which will be copied to the"
" pragmas and proto directories.\n\n"
))
(set #t_stormincpath " Where do you want to place the StormC include files?")
(set #t_stormincpathhelp (cat
" StormC needs some extra files to find out which registers"
" to use when calling AHI functions. That information is"
" located in these files, which will be copied to the"
" pragma and proto directories.\n\n"
))
(set #t_ahidevhelp (cat
" ahi.device is the heart of the AHI"
" audio system. This is the only part"
" that other programs knows anything about.\n\n"
))
(set #t_runaddmodes (cat
" About to run AddAudioModes to recreate"
" the audio modes database."
))
(set #t_overwritemode1
" There is already a copy of the audio mode descriptor ")
(set #t_overwritemode2 " present in ")
(set #t_overwritemode3 (cat
".\n\n"
" Do you want to overwrite it?"
" All changes you have done to to it will be lost!"
))
(if (= @language "srpski")
( ; Translated by Ljubomir Jankovic <lurch@afrodita.rcub.bg.ac.yu>
(set #t_welcome (cat
" Dobrodoãli u AHI instalaciju. AHI je retargetable"
" audio sistem koji moäe biti koriãáen sa ugraâenim"
" zvuànim àipom (Paula) i viãe zvuànih kartica."
" Ovo je verzija 4."
))
(set #t_oldinstaller (cat
" Vi imate staru verziju Installer-a. Verovatno áe mi"
" trebati verzija 43.3 ili viãa. Moäete nastaviti, ali"
" nema garancije da áe sve raditi kako je predviâeno.\n"
" Da li stvarno äelite da nastavite?"
))
(set #t_oldinstallerhelp (cat
" Verzija Installer-a koju koristite previãe stara. Moäete"
" naái najnoviju verziju na Internetu, na primer"
" na Aminet-u, u direktorijumu util/misc. Trenutno ime"
" fajla je \"Installer-43_3.lha\":\n"
" <URL:ftp://ftp.germany.aminet.org/pub/aminet/util/misc/Installer-43_3.lha"
))
(set #t_installaborted "Instalacija prekinuta.")
(set #t_installing "Instaliram ")
(set #t_installingdocs "Instaliram dokumentaciju za programere")
(set #t_installingincs "Instaliram include fajlove")
(set #t_installingsrc "Instaliram primere izvornog koda")
(set #t_nofiles "Nema fajlova za instaliranje.")
(set #t_nohelp "Pomoá nije dostupna.")
(set #t_parts "Koje delove AHI-ja äelite de instalirate?")
(set #t_system "Sistemske fajlove")
(set #t_prefs "Program za podeãavanja")
(set #t_audio "AUDIO hendler");
(set #t_userdoc "Korisniàka dokumentacija")
(set #t_a-developer "Fajlovi za razvoj aplikacija")
(set #t_d-developer "Fajlovi za razvoj drajvera")
(set #t_userhelp (cat
"Sistemski fajlovi:\n"
" Ovo je srce AHI-ja i mora postojati"
" da bi radile ostale komponente.\n\n"
"Program za podeãavanja:\n"
" Moäe se koristiti za podeãavanje mnogih opcija"
" AHI-ja. Ovaj deo AHI-ja zahteva da se instalira BGUI.\n\n"
"AUDIO hendler:\n"
" Omoguáava Vam da puãtate i snimate semplove komandom"
" 'copy'.\n\n"
"Korisniàka dokumentacija:\n"
" AmigaGuide® fajl koji opisuje AHI audio sistem i"
" njegove komponente.\n\n"
))
(set #t_devhelp (cat
"Fajlovi za razvoj aplikacija:\n"
" Autodokovi, include fajlovi, primeri izvornog koda itd."
" Oni su neophodni ako äelite da koritite AHI u svoji aplikacijama.\n\n"
"Fajlovi za razvoj drajvera:\n"
" Autodokovi, primeri izvornog koda itd. Potrebni su"
" samo ako planirate da razvijate hardverske drajvere za"
" zvuàne kartice.\n\n"
))
(set #t_languages (cat
"Koje jezike äelite da instalirate?"
" Ugraâeni jezik je Engleski."))
(set #t_languageshelp (cat
" Ako se Vaã jezik ne nalazi na listi, autor AHI-ja"
" bi bio veoma sreáan, ako bi napravili prevod. Promenite fajlove"
" User/Catalogs/NewCatalog.ct i User/Catalogs/NewPrefsCatalog.ct"
" i poãaljite na ovu adresu:\n"
" lcs@lysator.liu.se\n\n"
))
(set #t_drivers (cat
"Koje AHI drajvere äelite da instalirate?"
" Najbolje je da instalirate samo drajvere koji su Vam potrebni."))
(set #t_drivershelp (cat
"Delfina:\n"
" Delfina Classic/Lite zvuàna kartica.\n\n"
"Filesave:\n"
" Àitanje/zapis zvuànih podataka u fajl.\n\n"
"Maestro Pro:\n"
" Maestro Pro zvuàna kartica.\n\n"
"Melody MPEG:\n"
" Melody MPEG zvuàna kartica.\n\n"
"Paula:\n"
" Obiàan Amigin zvuàni hardver.\n\n"
"Prelude:\n"
" Prelude zvuàna kartica.\n\n"
"Toccata:\n"
" Toccata zvuàna kartica.\n\n"
"Wavetools:\n"
" Wavetools zvuàna kartica.\n\n"
))
(set #t_CPUver "Koju verziju programskih fajlova äelite da instalirate?")
(set #t_CPUverhelp (cat
" Fajlovi optimizovani za 68020 su bräi, i obiàno"
" manji nego njihove 68000 verzije. U sluàaju AHI-ja,"
" verzije za 68000 imaju manje moguánosti i smanjen"
" kvalitet zvuka. Zaista Vam preporuàujem da instalirate"
" verzije fajlova za 68020.\n"
" Verzija za 68060 izbegava sporo 64-vorobitno deljenje. Nemojte"
" instalirati ovu verziju ako nemate 68060 procesor!\n\n"
))
(set #t_devfiles "Koje programerske fajlove äelite da instalirate?")
(set #t_devdocs "Autodokove i AHI Vodià za programere")
(set #t_source "Primeri izvornog koda")
(set #t_asm "Include fajlove za asembler")
(set #t_cgen "Opãte include fajlove za C")
(set #t_e "E module")
(set #t_fd "FD fajlove")
(set #t_ade "Dodatne ADE gcc include fajlove")
(set #t_sas "Dodatne SAS/C (i DICE) include fajlove")
(set #t_storm "Dodatne StormC include fajlove")
(set #t_devfileshelp (cat
"Autodokovi i AHI Vodià za programere:\n"
" Autodokovi i pravila za programiranje AHI-ja.\n\n"
"Primeri izvornog koda:\n"
" Neki programi za primer, veáina napisan u C-u, ali ima"
" i neãto izvornog koda u asembleru.\n\n"
"Include fajlovi za asembler:\n"
" Include fajlovi koji su potrebni ako programirate u asembleru.\n\n"
"Opãti include fajlovi za C:\n"
" Include fajlovi koji su potrebni ako programirate u C-u.\n\n"
"E moduli:\n"
" Moduli za koriãáenje u Amiga E-u.\n\n"
"FD fajlovi:\n"
" Mogu se koristiti sa programom 'lvo', ili kada pravite"
" hardverski drajver napisan u C-u.\n\n"
"Dodatni ADE gcc include fajlovi:\n"
" Specijalni include fajlovi za gcc (inline, proto itd.).\n\n"
"Dodatni SAS/C (i DICE) include fajlovi:\n"
" Specijalni include fajlovi za SAS/C (pragma, proto itd.)."
" Rade i sa DCC-om, ali bez poziva tag-ova.\n\n"
"Dodatni StormC include fajlovi:\n"
" Specijalni include fajlovi za StormC (pragma, proto itd.).\n\n"
))
(set #t_nodevs
"Ne mogu da naâem Devs: asajn. Pokuãajte viãi korisniàki nivo.")
(set #t_noc
"Ne mogu da naâem C: asajn. Pokuãajte viãi korisniàki nivo.")
(set #t_noprefs
"Ne mogu da naâem Sys:Prefs directory. Pokuãajte viãi korisniàki nivo.")
(set #t_nol
"Ne mogu da naâem L: asajn. Pokuãajte viãi korisniàki nivo.")
(set #t_devspath "Gde äelite da instalirate sistemske fajlove?")
(set #t_devspathhelp (cat
" Direktorijum koji odaberete mora biti deo Vaãeg Devs: asajna."
" Installer áe kopirati ahi.device, hardverske drajvere"
" i fajlove sa opisima audio modova u ovaj direktorijum."
" Poddirektorijumi za drajvere i fajlove sa opisima modova"
" áe biti napravljeni.\n\n"
))
(set #t_cpath "Gde äelite da instalirate AddAudioModes?")
(set #t_cpathhelp (cat
" AddAudioModes je mali CLI program koji se moäe koristiti"
" za manipulaciju baze podataka koja sadräi audio modove"
" (vrlo sliàno bazi podataka sa moguáim rezolucijama ekrana)."
" CLI programi se obiàno nalaze u C: direktorijumu.\n\n"
))
(set #t_localepath "Gde äelite da instalirate kataloge?")
(set #t_localepathhelp (cat
" Direktorijum koji odaberete mora biti deo Locale: asajna."
" Installer áe kopirati kataloge koje odaberete u"
" poddirektorijume u ovom direktorijumu.\n\n"
))
(set #t_prefspath "Gde äelite da instalirate program za podeãavanja?")
(set #t_prefspathhelp (cat
" Program za podeãavanja Vam omoguáava da podesite AHI vaãoj"
" konkretnoj konfiguraciji. Moäete odabrati koji zvuàni hardver"
" äelite da koristite, koje fiziàke ulaze i izlaze äelite da"
" koritite itd. Programi za podeãavanja se obiàno nalaze u"
" Sys:Prefs/ direktorijumu.\n"
" Ovaj program zahteva BGUI biblioteku.\n\n"
))
(set #t_audiohelp (cat
" AUDIO hendler se koristi za mount-ovanje AUDIO: ureâaja. Kopirajuái"
" fajlove na i sa ureâaja, moäete puãtati i snimati sirove zvuàne"
" podatke, IFF-AIFF ili IFF-AIFC fajlove.\n\n"
))
(set #t_lpath "Gde äelite da instalirate AUDIO hendler?")
(set #t_lpathhelp (cat
#t_audiohelp
" Hendleri se obiàno nalaze u L: direktorijumu.\n\n"
))
(set #t_dosdevpath "Gde äelite da instalirate fajl za mount-ovanje AUDIO hendlera?")
(set #t_dosdevpathhelp (cat
#t_audiohelp
" Mount fajlovi se nalaze u direktorijumu Devs:DOSDrivers"
" ako treba da se mount-uju pri dizanju sistema. Ako ne, onda"
" se verovatno nalaze u SYS:Storage/DOSDrivers direktorijumu.\n\n"
))
(set #t_dosdriver "Da li äelite da hendler bude instaliran pri dizanju sistema?")
(set #t_dosdriverhelp (cat
" Ako äelite, AUDIO: ureâaj moäe biti dostupan àim se digne sistem."
" Ovo vam omoguáava da ne morate da mount-ujete ureâaj svaki put"
" kada äelite da ga koristite. Ureâaj ne zahteva mnogo memorije"
" i zato preporuàujem da da odaberete 'Da'.\n\n"
))
(set #t_userdocpath "Gde äelite da instalirate korisniàku dokumentaciju?")
(set #t_userdocpathhelp (cat
" Ovo je AmigaGuide® fajl koji opisuje AHI audio sistem"
" i njegove komponente.\n\n"
))
(set #t_srcpath (cat
" Gde äelite da instalirate primere izvornog koda?"
" Direktorijum sa imenom AHI biáe napravljen tamo."
))
(set #t_srcpathhelp (cat
" Primeri izvornog koda, i u C-u i asembleru, áe biti"
" stavljeni u poddirektorijum imena AHI. Svi fajlovi koji"
" se nalaze u AHI direktorijumu áe biti obrisani!\n\n"
))
(set #t_oldsrc (cat
" Ovde veá postoji direktorijum imena AHI."
" Svi fajlovi u njemu áe biti obrisani."
))
(set #t_devdocspath " Gde äelite da stavite dokumentaciju za programere?")
(set #t_devdocspathhelp (cat
" Installer áe staviti autodok fajlove i dokumentaciju za"
" razvoj AHI-ja direktorijum koji odaberete.\n\n"
))
(set #t_aincpath " Gde se nalaze Vaãi include fajlovi za asembler?")
(set #t_aincpathhelp (cat
" Installer áe smestiti include fajlove za asembler"
" u poddirektorijume (lvo, devices i libraries)"
" direktorijuma koji odaberete.\n\n"
))
(set #t_fdpath " Gde dräite Vaãe FD fajlove?")
(set #t_fdpathhelp (cat
" FD fajlovi su fajlovi koji opisuju funkcije biblioteke"
" i ureâaja. Mogu se koristiti sa programom 'lvo', i"
" i mogu biti korisni ako piãete hardverske drajvere.\n\n"
))
(set #t_cincpath " Gde se nalaze Vaãi C include fajlovi?")
(set #t_cincpathhelp (cat
" Installer áe smestiti opãte include fajlove za C"
" u poddirektorijume (clib, devices i libraries)"
" direktorijuma koji odaberete.\n\n"
))
(set #t_emodpath " Gde se nalaze Vaãi E modul fajlovi?")
(set #t_emodpathhhelp (cat
" Installer áe smestiti E modul fajlove u direktorijum"
" i poddirektorijume (devices i libraries)"
" direktorijuma koji odaberete.\n\n"
))
(set #t_adeincpath " Gde äelite da smestite ADE gcc include fajlove?")
(set #t_adeincpathhelp (cat
" gcc-u trebaju neki dodatni fajlovi da bi naãao koje registre"
" da koristi pri pozivu AHI funkcija. Te informacije se nalaze"
" u ovim fajlovima, koji áe biti kopirani u direktorijume "
" inline, pragmas i proto.\n\n"
))
(set #t_sasincpath " Gde äelite da smestite SAS/C (i DICE) include fajlove?")
(set #t_sasincpathhelp (cat
" SAS/C-u (i DICE-u) trebaju neki dodatni fajlovi da bi naãao"
" koje registre da koristi pri pozivu AHI funkcija. Te informacije"
" se nalaze u ovim fajlovima, koji áe biti kopirani u pragmas"
" i proto direktorijume.\n\n"
))
(set #t_stormincpath " Gde äelite da smestite StormC include fajlove?")
(set #t_stormincpathhelp (cat
" StormC-u neki dodatni fajlovi da bi naãao koje registre"
" da koristi pri pozivu AHI funkcija. Te informacije se nalaze"
" u ovim fajlovima, koji áe biti kopirani u pragma i proto"
" direktorijume.\n\n"
))
(set #t_ahidevhelp (cat
" ahi.device je srce AHI audio"
" sistema. Ovo je jedini deo za koga"
" drugi programi znaju.\n\n"
))
(set #t_runaddmodes (cat
" Upravo startujem AddAudioModes da bih"
" osveäio bazu audio modova."
))
(set #t_overwritemode1
" Veá postoji fajl sa opisom audio moda ")
(set #t_overwritemode2 " prisutan u ")
(set #t_overwritemode3 (cat
".\n\n"
" Da li äelite da zapiãem preko njega?"
" Sve promene koje ste naàinili na njemu biáe izgubljene!"
))
))
(if (= @language "suomi")
( ; Translated by Petteri Kallio <k140734@cs.tut.fi>
(set #t_welcome (cat
" Tervetuloa AHI-asennukseen. AHI on äänijärjestelmä,"
" jonka avulla saat käyttöösi Amigan standardin äänipiirin"
" (Paula) lisäksi myös useita varsinaisia äänikortteja."
" Tämä on AHI:n neljäs (4.) versio."
))
(set #t_oldinstaller (cat
" Käytössäsi on Installer-ohjelman vahentunut versio."
" Voit jatkaa asennusta, mutta asennuksessa saattaa"
" mennä jotain pieleen. Todennäköisesti tarvitsen"
" Installer-ohjelman version 43.3 tai uudemman."
" Haluaisitko kuitenkin jatkaa asennusta?"
))
(set #t_oldinstallerhelp (cat
" Käyttämäsi Installer-ohjelma on liian vanha versio."
" Löydät uudemman version vaikkapa Internetistä, esim."
" Aminetistä, hakemistosta util/misc. Tuoreimman"
" Installer-ohjelman nimi on \"Installer-43_3.lha\":\n"
" <URL:ftp://ftp.germany.aminet.org/pub/aminet/util/misc/Installer-43_3.lha"
))
(set #t_installaborted "Asennus keskeytetty.")
(set #t_installing "Asennan... ")
(set #t_installingdocs "Asennan kehitysympäristön ohjetiedostoja")
(set #t_installingincs "Asennan include-tiedostoja")
(set #t_installingsrc "Asennan esimerkkilähdekoodeja")
(set #t_nofiles "Ei asennettavia tiedostoja.")
(set #t_nohelp "Ohjeita ei ole saatavissa.")
(set #t_parts "Mitkä osat AHI:sta haluat asentaa?")
(set #t_system "Järjestelmätiedostot")
(set #t_prefs "Asetusohjelma")
(set #t_audio "AUDIO-käsittelijä");
(set #t_userdoc "Käyttäjän ohjeet")
(set #t_a-developer "Sovellusten kehitysympäristön tiedostot")
(set #t_d-developer "Ajurien kehitysympäristön tiedostot")
(set #t_userhelp (cat
"Järjestelmätiedostot:\n"
" Tämä on AHI-äänijärjestelmän sydän."
" Se täytyy olla asennettuna, ennen kuin AHI:n muut"
" osat toimivat.\n\n"
"Asetusohjelma:\n"
" Asetusohjelmaa käytetään muokkaamaan AHI:n lukuisia asetuksia.\n"
" Asetusohjelma vaatii, että BGUI on asennettu.\n\n"
"AUDIO-käsittelijä:\n"
" Mahdollistaa äänitiedostojen toiston ja tallennuksen"
" 'copy'-komennon avulla.\n\n"
"Käyttäjän ohjeet:\n"
" AmigaGuide®-muotoinen tiedosto, jossa selvitetään"
" AHI-äänijärjestelmä ja sen eri osat.\n\n"
))
(set #t_devhelp (cat
"Sovellusten kehitysympäristön tiedostot:\n"
" Autodocit, include-tiedostot, esimerkkilähdekoodit jne."
" Tarpeellisia jos haluat käyttää AHI-äänijärjestelmää"
" omissa sovellusohjelmissasi.\n\n"
"Ajurien kehitysympäristön tiedostot:\n"
" Autodocit, esimerkkilähdekoodit jne. Tarpeellisia ainoastaan"
" jos aiot tehdä uusia äänikorttiajureita.\n\n"
))
(set #t_languages (cat
"Mille kielille haluat tehdä asennuksen?"
" Valmiskielenä on englanti."))
(set #t_languageshelp (cat
" Jos oma kielesi ei ole listassa, AHI:n tekijä olisi"
" mielissään, jos sinä voisit tehdä käännöksen omalle"
" kielellesi. Käännä tiedostot User/Catalogs/NewCatalog.ct"
" ja User/Catalogs/NewPrefsCatalog.ct, ja lähetä ne"
" tähän osoitteeseen:\n"
" lcs@lysator.liu.se\n\n"
))
(set #t_drivers (cat
"Mitkä AHI-ajurit haluat asentaa?"
" Asenna ainoastaan tarvitsemasi ajurit."))
(set #t_drivershelp (cat
"Delfina:\n"
" Delfina Classic/Lite -äänikortti.\n\n"
"Filesave:\n"
" Kirjoita/lue äänitiedosto tiedostoon.\n\n"
"Maestro Pro:\n"
" Maestro Pro -äänikortti.\n\n"
"Melody MPEG:\n"
" Melody MPEG-äänikortti.\n\n"
"Paula:\n"
" Amigan perusäänijärjestelmä.\n\n"
"Prelude:\n"
" Prelude-äänikortti.\n\n"
"Toccata:\n"
" Toccata-äänikortti.\n\n"
"Wavetools:\n"
" Wavetools-äänikortti.\n\n"
))
(set #t_CPUver "Mitkä versiot ohjelmakoodista haluat asentaa?")
(set #t_CPUverhelp (cat
" 68020-prosessorille optimoidut versiot ovat nopeampia ja"
" usein pienikokoisempia kuin 68000-prosessorille tehdyt"
" perusversiot. AHI-äänijärjestelmän 68000-versioissa on"
" vähemmän ominaisuuksia ja huonompi äänenlaatu."
" 68020-versiot kannattaa asentaa, jos käytössäsi"
" on vähintään 68020-prosessorilla varustettu kone.\n"
" 68060-versio välttää hitaita 64-bittisiä jakolaskuja. Älä"
" asenna tätä versiota ellei sinulla ole 68060-prosessoria!\n\n"
))
(set #t_devfiles "Mitkä kehitysympäristön tiedostot haluat asentaa?")
(set #t_devdocs "Autodocit ja AHI-kehitysympäristön ohjeet")
(set #t_source "Esimerkkilähdekoodit")
(set #t_asm "Assemblerin include-tiedostot")
(set #t_cgen "Yleiset C include-tiedostot")
(set #t_e "E moduletiedostot")
(set #t_fd "FD-tiedostot")
(set #t_ade "Ylimääräiset ADE gcc include-tiedostot")
(set #t_sas "Ylimääräiset SAS/C (ja DICE) include-tiedostot")
(set #t_storm "Ylimääräiset StormC include-tiedostot")
(set #t_devfileshelp (cat
"Autodocit ja AHI-kehitysympäristön ohjeet:\n"
" AHI:n autodocit ja ohjelmointisäännöt.\n\n"
"Esimerkkilähdekoodit:\n"
" Joitain esimerkkiohjelmia, suurin osa C-kielellä, mutta"
" mukana on myös muutamia assembler-lähdekoodeja.\n\n"
"Assemblerin include-tiedostot:\n"
" Include-tiedostot, jotka tarvitset ohjelmoidessasi assemblerilla.\n\n"
"Yleiset C include-tiedostot:\n"
" Include-tiedostot, jotka tarvitset ohjelmoidessasi C-kielellä.\n\n"
"E moduletiedostot:\n"
" Moduletiedostot, AmigaE-ohjelmointia varten.\n\n"
"FD-tiedostot:\n"
" Voidaan käyttää 'lvo'-työkalun kanssa, tai jos teet"
" laitteistoajurin C-kielellä.\n\n"
"Ylimääräiset ADE gcc include-tiedostot:\n"
" Gcc:n erikoisinclude-tiedostot (inline, proto jne).\n\n"
"Ylimääräiset SAS/C (ja DICE) include-tiedostot:\n"
" SAS/C:n erikoisinclude-tiedostot (pragma, proto jne)."
" Toimivat osin myös DCC:n kanssa.\n\n"
"Ylimääräiset StormC include-tiedostot:\n"
" StormC:n erikoisinclude-tiedostot (pragma, proto jne).\n\n"
))
(set #t_nodevs
"Viitettä Devs: ei löytynyt. Kokeile ylempää käyttäjän tasoluokitusta.")
(set #t_noc
"Viitettä C: ei löytynyt. Kokeile ylempää kättäjän tasoluokitusta.")
(set #t_noprefs
"Hakemistoa Sys:Prefs ei löytynyt. Kokeile ylempää käyttäjän tasoluokitusta.")
(set #t_nol
"Viitettä L: ei löytynyt. Kokeile ylempää käyttäjän tasoluokitusta.")
(set #t_devspath "Minne haluat asentaa järjestelmätiedostot?")
(set #t_devspathhelp (cat
" Valitsemaasi hakemistoon tulee olla viite Devs:."
" Asennusohjelma kopioi ahi.device-tiedoston, laitteistoajurit"
" ja audiotilojen kuvaustiedostot tähän hakemistoon."
" Ajureille ja audiotilatiedostoille luodaan alihakemistot.\n\n"
))
(set #t_cpath "Minne haluat asentaa ohjelman 'AddAudioModes'?")
(set #t_cpathhelp (cat
" AddAudioModes on pieni komentoriviohjelma, jonka avulla"
" voit muokata audiotiloja sisältävää tietokantaa"
" (aivan kuten näyttötilojen tietokanta).\n"
" Komentoriviohjelmat sijaitsevat yleensä hakemistossa C:.\n\n"
))
(set #t_localepath "Minne haluat asentaa sanastot?")
(set #t_localepathhelp (cat
" Valitsemaasi hakemistoon tulee olla viite Locale:."
" Asennusohjelma kopioi valitsemasi sanastot tässä"
" hakemistossa oleviin alihakemistoihin.\n\n"
))
(set #t_prefspath "Minne haluat asentaa asetusohjelman?")
(set #t_prefspathhelp (cat
" Asetusohjelman avulla voit määrittää AHI-äänijärjestelmän"
" asetukset. Voit valita haluamasi laitteiston, fyysiset"
" ulostulot ja sisäänmenot jne. Asetusohjelmat sijaitsevat"
" normaalisti hakemistossa Sys:Prefs/.\n"
" Tämä ohjelma vaatii toimiakseen BGUI:n.\n\n"
))
(set #t_audiohelp (cat
" AUDIO-käsittelijää käytetään kiinnitettäessä laitetta AUDIO:."
" Kopioimalla tiedostoja tälle laitteelle tai tältä laitteelta"
" voit toistaa ja tallentaa raakaa äänitietoa, IFF-AIFF- tai"
" IFF-AIFC-tiedostoja.\n\n"
))
(set #t_lpath "Minne haluat asentaa AUDIO-käsittelijän?")
(set #t_lpathhelp (cat
#t_audiohelp
" Käsittelijät sijaitsevat yleensä hakemistossa L:.\n\n"
))
(set #t_dosdevpath "Minne haluat asentaa AUDIO-kiinnitystiedoston?")
(set #t_dosdevpathhelp (cat
#t_audiohelp
" Kiinnitystiedostot sijaitsevat yleensä hakemistossa"
" Devs:DOSDrivers, jos laitteet kiinnitetään käynnistyksen"
" yhteydessä. Muutoin kiinnitystiedostot sijaitsevat"
" varmaankin hakemistossa SYS:Storage/DOSDrivers.\n\n"
))
(set #t_dosdriver "Haluatko kiinnittää laitteen AUDIO: käynnistyksen yhteydessä?")
(set #t_dosdriverhelp (cat
" Jos haluat, laite AUDIO: voidaan kiinnittää käynnistyksen"
" yhteydessä. Tämä poistaa tarpeen kiinnittää laite erikseen"
" aina kun haluat käyttää sitä. Kiinnitys ei vie paljoakaan"
" muistia, joten on suositeltavaa, että valitset 'Kyllä'.\n\n"
))
(set #t_userdocpath "Minne haluat asentaa käyttäjän ohjeet?")
(set #t_userdocpathhelp (cat
" Ohjeet ovat AmigaGuide®-tiedostona, jossa kuvataan"
" AHI-äänijärjestelmää ja sen osia.\n\n"
))
(set #t_srcpath (cat
" Minne haluat asentaa esimerkkilähdekoodit?"
" Valitsemaasi hakemistoon luodaan alihakemisto AHI."
))
(set #t_srcpathhelp (cat
" Esimerkkilähdekoodit, sekä C- että assembler-kieliset,"
" tallennetaan alihakemistoon AHI. Kaikki entiset tiedostot"
" hakemistossa AHI tuhotaan!\n\n"
))
(set #t_oldsrc (cat
" Siellä on jo alihakemisto AHI."
" Kaikki tiedostot alihakemistossa AHI poistetaan."
))
(set #t_devdocspath " Minne haluat asentaa kehitysympäristön ohjeet?")
(set #t_devdocspathhelp (cat
" Asennusohjelma sijoittaa autodocit ja AHI-kehitysympäristön"
" ohjeet valitsemaasi hakemistoon.\n\n"
))
(set #t_aincpath " Missä sijaitsevat assemblerisi include-tiedostot?")
(set #t_aincpathhelp (cat
" Asennusohjelma sijoittaa assemblerin include-tiedostot"
" valitsemasi hakemiston alihakemistoihin (lvo, devices ja"
" libraries).\n\n"
))
(set #t_fdpath " Missä sijaitsevat FD-tiedostosi?")
(set #t_fdpathhelp (cat
" FD-tiedostot kuvaavat kirjaston tai laitteen toimintoja."
" Niitä voidaan käyttää 'lvo'-ohjelman kanssa, ja niistä"
" voi olla hyötyä kirjoittaessasi laitteistoajureita.\n\n"
))
(set #t_cincpath " Missä sijaitsevat C-kääntäjäsi include-tiedostot?")
(set #t_cincpathhelp (cat
" Asennusohjelma sijoittaa yleiset C-kääntäjän include-tiedostot"
" valitsemasi hakemiston alihakemistoihin (clib, devices"
" ja libraries).\n\n"
))
(set #t_emodpath " Missä sijaitsevat E moduletiedostosi?")
(set #t_emodpathhhelp (cat
" Asennusohjelma sijoittaa E moduletiedostot valitsemasi"
" hakemiston alihakemistoihin (devices ja libraries).\n\n"
))
(set #t_adeincpath " Minne haluat sijoittaa ADE gcc include-tiedostot?")
(set #t_adeincpathhelp (cat
" Gcc tarvitsee muutamia ylimääräisiä tiedostoja"
" tietääkseen mitä rekistereitä voidaan käyttää"
" kutsuttaessa AHI-funktioita. Tämä tieto on"
" tiedostoissa, jotka kopioidaan alihakemistoihin"
" inline, pragmas ja proto.\n\n"
))
(set #t_sasincpath " Minne haluat sijoitta SAS/C (ja DICE) include-tiedostot?")
(set #t_sasincpathhelp (cat
" SAS/C (ja DICE) tarvitsevat muutamia ylimääräisiä"
" tiedostoja tietääkseen mitä rekistereitä voidaan"
" käyttää kutsuttaessa AHI-funktioita. Tämä tieto on"
" tiedostoissa, jotka kopioidaan alihakemistoihin"
" pragmas ja proto.\n\n"
))
(set #t_stormincpath " Minne haluat sijoittaa StormC include-tiedostot?")
(set #t_stormincpathhelp (cat
" StormC tarvitsee muutamia ylimääräisiä tiedostoja"
" tietääkseen mitä rekistereitä voidaan käyttää"
" kutsuttaessa AHI-funktioita. Tämä tieto on tiedostoissa,"
" jotka kopioidaan alihakemistoihin pragma ja proto.\n\n"
))
(set #t_ahidevhelp (cat
" Ahi.device on AHI-äänijärjestelmän sydän."
" Tämä on ainoa osa, joka näkyy muille ohjelmille.\n\n"
))
(set #t_runaddmodes (cat
" Ajan komennon AddAudioModes luodakseni"
" audiotilatietokannan."
))
(set #t_overwritemode1
" Audiotilakuvauksesta on jo olemassa kopio ")
(set #t_overwritemode2 " tiedostossa ")
(set #t_overwritemode3 (cat
".\n\n"
" Kirjoitetaanko päälle?"
" Kaikki audiotilaan tekemäsi muutokset tulevat katoamaan!"
))
))
(if (= @language "ÃeÓtina")
( ; Tranlated by Vit Sindlar <sindlarv@hotmail.com>
(set #t_welcome (cat
" VÉtejte pÒi instalaci AHI. AHI je pÒesmÅrovatelnÙ"
" audio syst×m, kterÙ je moÚno pouÚÉvat jak s vestavÅnÙm"
" zvukovÙm Ãipem (Paula), tak i nÅkolika zvukovÙmi kartami."
" AktuÁlnÉ verze tohoto software je 4."
))
(set #t_oldinstaller (cat
" VlastnÉte starou verzi programu Installer. Tento"
" instalaÃnÉ skript pravdÅpodobnÅ vyÚaduje verzi 43.3"
" a vyÓÓÉ. Instalace bude pokraÃovat, ale nelze zaruÃit,"
" Úe vÓe bude fungovat, tak jak mÁ.\n"
" Opravdu si pÒejete pokraÃovat?"
))
(set #t_oldinstallerhelp (cat
" Verze programu Installer, kterÙ pouÚÉvÁte je pÒÉliÓ"
" starÁ. NejnovÅjÓÉ verzi naleznete vÚdy na Internetu,"
" napÒ. na Aminetu, v adresÁÒi util/misc. NÁzev archÉvu"
" je \"Installer-43_3.lha\":\n"
" <URL:ftp://ftp.germany.aminet.org/pub/aminet/util/misc/Installer-43_3.lha"
))
(set #t_installaborted "Instalace byla pÒeruÓena.")
(set #t_installing "ProbÉhÁ instalace ")
(set #t_installingdocs "Instaluje se dokumentace pro vÙvojÁÒe")
(set #t_installingincs "InstalujÉ se includes")
(set #t_installingsrc "InstalujÉ se pÒÉklady zdrojovÙch kÏdÊ")
(set #t_nofiles "Soubory pro instalaci chybÉ.")
(set #t_nohelp "Pro tuto poloÚku nenÉ dostupnÁ nÁpovÅda.")
(set #t_parts "Kter× ÃÁsti AHI si pÒejete nainstalovat?")
(set #t_system "Syst×mov× soubory")
(set #t_prefs "Program pro nastavenÉ")
(set #t_audio "AUDIO handler");
(set #t_userdoc "UÚivatelskÁ dokumentace")
(set #t_a-developer "Soubory pro vÙvojÁÒe programÊ")
(set #t_d-developer "Soubory pro vÙvojÁÒe ovladaÃÊ")
(set #t_userhelp (cat
"Syst×mov× soubory:\n"
" Syst×mov× soubory - to je vlastnÅ jÁdro cel×ho AHI a musÉ"
" bÙt vÚdy nainstalovÁny. Jsou nutn× pro sprÁvnou funkci"
" vÓech ostatnÉch komponent.\n\n"
"Program pro nastavenÉ:\n"
" Program pro nastavenÉ - je pouÚÉvÁn pro pohodln× nastavenÉ"
" mnoha voleb AHI. Tato ÃÁst AHI vyÚaduje ke sv× Ãinnosti"
" nainstalovanou knihovnu BGUI.library.\n\n"
"AUDIO handler:\n"
" UmoÚÎuje pÒehrÁvat a zaznamenÁvat samply velice jednoduÓe"
" pomocÉ pÒÉkazu 'copy'.\n\n"
"UÚivatelskÁ dokumentace:\n"
" Dokumentace napsanÁ ve standardnÉm formÁtu AmigaGuide®,"
" kterÁ popisuje AHI a ostatnÉ ÃÁsti syst×mu.\n\n"
))
(set #t_devhelp (cat
"Soubory pro vÙvojÁÒe programÊ:\n"
" Autodocs, includes, pÒÉkladov× zdrojov× kÏdy atd."
" Je nutn× nainstalovat pouze v pÒÉpadÅ, Úe budete vyvÉjet"
" svÊj vlastnÉ program s podporou AHI.\n\n"
"Soubory pro vÙvojÁÒe ovladaÃÊ:\n"
" Autodocs, pÒÉkladovÙ zdrojovÙ kÏd atd. Je nutn× pouze"
" v pÒÉpadÅ, Úe budete vyvÉjet ovladaÃe pro zvukov× karty.\n\n"
))
(set #t_gui (cat
" Kterou z verzÉ programÊ pro nastavenÉ byste si pÒÁli"
" nainstalovat?"
))
(set #t_guihelp (cat
" Zvolte typ GUI, kter×mu dÁvÁte pÒednost, prosÉm.\n\n"
))
(set #t_guibgui "Verze v BGUI")
(set #t_guimui "Verze v MUI")
(set #t_icon "Kter× ikony si pÒejete nainstalovat?")
(set #t_iconstd "StandardnÉ 4-barevn×")
(set #t_iconmwb "8-barevn× typu MagicWB")
(set #t_iconhelp (cat
" Zde si zvolÉte druh ikony, kterou si pÒejete pouÚÉvat pro"
" program pro nastavenÉ. Autorem ikony typu MagicWB je Erol Ismael.\n\n"
))
(set #t_languages (cat
"KterÙ z jazykÊ si pÒejete nainstalovat?"
" StandardnÉ je angliÃtina."))
(set #t_languageshelp (cat
" JestliÚe chybÉ zrovna pÒeklad do VaÓeho jazyka, autor AHI"
" by VÁs velmi rÁd poÚÁdal o pÒeklad. Upravte a pÒeloÚte"
" soubory User/Catalogs/NewCatalog.ct a User/Catalogs/NewPrefsCatalog.ct"
" a poÓlete je na tuto adresu:\n"
" lcs@lysator.liu.se\n\n"
" Je dobr× se nejdÒÉve zeptat autora, zda jiÚ nÅkdo pÒeklad"
" do VaÓeho jazyka nedÅlÁ.\n\n"
))
(set #t_drivers (cat
"Kter× z ovladaÃÊ AHI si pÒejete nainstalovat?"
" Je lepÓÉ si nainstalovat pouze ovladaÃe, kter× skuteÃnÅ potÒebujete."))
(set #t_drivershelp (cat
"Delfina:\n"
" ZvukovÁ karta Delfina s DSP.\n\n"
"Filesave:\n"
" UmoÚnÉ ÃtenÉ/zÁpis samplÊ do souboru.\n\n"
"Maestro Pro:\n"
" ZvukovÁ karta Maestro Pro.\n\n"
"Melody MPEG:\n"
" ZvukovÁ karta Melody MPEG.\n\n"
"Paula:\n"
" StandardnÉ zvukovÙ Ãip Amigy.\n\n"
"Prelude:\n"
" ZvukovÁ karta Prelude.\n\n"
"Toccata:\n"
" ZvukovÁ karta Toccata.\n\n"
"Wavetools:\n"
" ZvukovÁ karta Wavetools.\n\n"
))
(set #t_CPUver "Pro jakÙ procesor si pÒejete nainstalovat programy?")
(set #t_CPUverhelp (cat
" Programy optimalizovan× pro 68020 a vyÓÓÉ jsou mnohem"
" rychlejÓÉ a Ãasto tak× menÓÉ neÚ verze pro obyÃejnou 68000."
" NavÉc, v pÒÉpadÅ AHI, majÉ verze pro 68000 m×nÅ funkcÉ"
" a pracujÉ s omezenou kvalitou zvuku. SkuteÃnÅ VÁm doporuÃuji"
" zvolit pÒi instalaci verze programÊ optimalizovan× pro 68020.\n"
" Verze pro 68060 neprovÁdÉ pomalÁ 64-bitovÁ dÅlenÉ. Pokud tedy"
" tento procesor nevlastnÉte, neinstalujte ji!\n\n"
))
(set #t_devfiles "Kter× ze souborÊ pro vÙvojÁÒe si pÒejete nainstalovat?")
(set #t_devdocs "Autodocs a dokumentaci pro vÙvojÁÒe k AHI")
(set #t_source "PÒÉkladov× zdrojov× kÏdy")
(set #t_asm "Includes pro assembler")
(set #t_cgen "Includes pro obecn× C")
(set #t_e "Moduly pro E")
(set #t_fd "Soubory FD")
(set #t_ade "Dodatkov× includes pro ADE gcc")
(set #t_sas "Dodatkov× includes pro SAS/C (a DICE)")
(set #t_storm "Dodatkov× includes pro StormC")
(set #t_devfileshelp (cat
"Autodocs a dokumentaci pro vÙvojÁÒe k AHI:\n"
" Autodocs a pravidla pro programovÁnÉ AHI.\n\n"
"PÒÉkladov× zdrojov× kÏdy:\n"
" NÅkolik pÒÉkladovÙch programÊ, nejÃastÅji jsou napsÁny v C,"
" ale je tam i nÅkolik kouskÊ v assembleru.\n\n"
"Includes pro assembler:\n"
" Includes, kter× jsou tÒeba pro programovÁnÉ v assembleru.\n\n"
"Includes pro obecn× C:\n"
" Includes, kter× jsou tÒeba pro programovÁnÉ v C.\n\n"
"Moduly pro E:\n"
" Moduly, kter× jsou nutn× pro AmigaE.\n\n"
"Soubory FD:\n"
" Pro pouÚitÉ s programem 'lvo', nebo v pÒÉpadÅ, Úe budete"
" psÁt ovladaà pro zvukovou kartu v C.\n\n"
"Dodatkov× includes pro ADE gcc:\n"
" SpeciÁlnÉ includes pro gcc (inline, proto atd).\n\n"
"Dodatkov× includes pro SAS/C (a DICE):\n"
" SpeciÁlnÉ includes pro SAS/C (pragmas, proto atd)."
" Budou fungovat tak× s DCC, ale bez volÁnÉ tagÊ.\n\n"
"Dodatkov× includes pro StormC:\n"
" SpeciÁlnÉ includes pro StormC (pragmas, proto atd).\n\n"
))
(set #t_nodevs (cat
"Nelze nal×zt pÒiÒazenÉ Devs:. PouÚijte vyÓÓÉ mÏd instalace"
" (pro zkuÓenÅjÓÉ uÚivatele)."
))
(set #t_noc (cat
"Nelze nal×zt pÒiÒazenÉ C:. PouÚijte vyÓÓÉ mÏd instalace"
" (pro zkuÓenÅjÓÉ uÚivatele)."
))
(set #t_noprefs (cat
"Nelze nal×zt adresÁÒ Sys:Prefs. PouÚijte vyÓÓÉ mÏd instalace"
" (pro zkuÓenÅjÓÉ uÚivatele)."
))
(set #t_nol (cat
"Nelze nal×zt pÒiÒazenÉ L:. PouÚijte vyÓÓÉ mÏd instalace"
" (pro zkuÓenÅjÓÉ uÚivatele)."
))
(set #t_devspath "Kam si pÒejete nainstalovat syst×mov× soubory?")
(set #t_devspathhelp (cat
" AdresÁÒ, kterÙ zvolÉte musÉ bÙt souÃÁstÉ pÒiÒazenÉ Devs:."
" PÒi instalaci se tam nakopÉruje ahi.device, ovladaÃe pro"
" hardware a soubory pro jednotliv× audio mÏdy."
" Pro ovladaÃe a soubory s jednotlivÙmi audio mÏdy budou"
" vytvoÒeny podadresÁÒe.\n\n"
))
(set #t_cpath "Kam si pÒejete nainstalovat AddAudioModes?")
(set #t_cpathhelp (cat
" AddAudioModes je pÒÉkaz, kterÙ slouÚÉ ke sprÁvÅ databÁze"
" audio mÏdÊ (podobnost s databÁzÉ rozliÓovacÉch mÏdÊ je"
" ÃistÅ nÁhodnÁ :-). PÒÉkaz by mÅl bÙt normÁlnÅ umÉstÅn"
" v pÒiÒazenÉ C:.\n\n"
))
(set #t_localepath "Kam si pÒejete nainstalovat lokalizaÃnÉ katalogy?")
(set #t_localepathhelp (cat
" AdresÁÒ, kterÙ zvolÉte musÉ bÙt souÃÁstÉ pÒiÒazenÉ Locale:."
" PÒi instalaci se tam nakopÉrujÉ lokalizaÃnÉ katalogy, kter×"
" jste si vybrali. PochopitelnÅ budou jednotliv× katalogy"
" nakopÉrovÁny do pÒÉsluÓnÙch adresÁÒÊ s danÙm jazykem.\n\n"
))
(set #t_prefspath "Kam si pÒejete nainstalovat program pro nastavenÉ?")
(set #t_prefspathhelp (cat
" Program pro nastavenÉ VÁm umoÚnÉ nakonfigurovat AHI pÒesnÅ"
" dle moÚnostÉ poÃÉtaÃe. Je zde moÚno nastavit, kterou z ÃÁstÉ"
" zvukov×ho hardware si pÒejete pouÚÉvat, jak× vstupy a vÙstupy"
" atd. Programy pro nastavenÉ se obvykle nachÁzÉ v adresÁÒi"
" SYS:Prefs/.\n"
" Tento program vyÚaduje balÉk BGUI nebo MUI, coÚ zÁleÚÉ na"
" volbÅ verze programu pro nastavenÉ.\n\n"
))
(set #t_audiohelp (cat
" AUDIO handler se pouÚÉvÁ k pÒipojenÉ zaÒÉzenÉ AUDIO:. PouhÙm"
" kopÉrovÁnÉm souborÊ z a do tohoto zaÒÉzenÉ je moÚno pÒehrÁvat"
" a zaznamenÁvat soubory v RAW, IFF-AIFF nebo IFF-AIFC.\n\n"
))
(set #t_lpath "Kam si pÒejete nainstalovat AUDIO handler?")
(set #t_lpathhelp (cat
#t_audiohelp
" Handlery jsou obvykle umÉstÅny v pÒiÒazenÉ L:.\n\n"
))
(set #t_dosdevpath "Kam si pÒejete nainstalovat pÒipojovacÉ soubor AUDIO (mount)?")
(set #t_dosdevpathhelp (cat
#t_audiohelp
" PÒipojovacÉ soubory (mount) jsou obvykle umÉstÅny v adresÁÒi"
" Devs:DOSDrivers, v pÒÉpadÅ, Úe si je pÒejete pÒipojovat hned"
" po startu. Pokud si to nepÒejete pak by mÅly bÙt pÒesunuty"
" do adresÁÒe SYS:Storage/DOSDrivers.\n\n"
))
(set #t_dosdriver "PÒejete si mÉt aktivovÁn AUDIO handler ihned startu?")
(set #t_dosdriverhelp (cat
" V pÒÉpadÅ, Úe si to pÒejete, je moÚno nainstalovat AHI tak,"
" Úe zaÒÉzenÉ AUDIO: bude aktivnÉ ihned po startu. Tento zpÊsob"
" ÓetÒÉ Ãas, kterÙ jinak musÉte vynaloÚit na proklikÁnÉ se do"
" SYS:Storage/DOSDrivers, a nevyÚaduje mnoho pamÅti. Z tohoto"
" dÊvodu se doporuÃuje odpovÅdÅt 'Ano'.\n\n"
))
(set #t_userdocpath "Kam si pÒejete nainstalovat uÚivatelskou dokumentaci?")
(set #t_userdocpathhelp (cat
" Toto je soubor v formÁtu AmigaGuide®, kterÙ popisuje vlastnosti"
" audio syst×mu AHI.\n\n"
))
(set #t_srcpath (cat
" Kam si pÒejete nainstalovat pÒÉkladov× zdrojov× kÏdy?"
" Na tomto mÉstÅ bude vytvoÒen adresÁÒ s nÁzvem AHI."
))
(set #t_srcpathhelp (cat
" PÒÉkladov× zdrojov× kÏdy (v jazyce C i assembleru) budou"
" uloÚeny v podadresÁÒi nazvan×m AHI. Jak×koliv soubory, kter×"
" jsou aktuÁlnÅ uloÚeny v adresÁÒi AHI, budou smazÁny!\n\n"
))
(set #t_oldsrc (cat
" Na tomto mÉstÅ jiÚ adresÁÒ AHI existuje."
" VÓechny soubory v nÅm budou smazÁny."
))
(set #t_devdocspath " Kam si pÒejete nainstalovat dokumentaci pro vÙvojÁÒe?")
(set #t_devdocspathhelp (cat
" Autodocs a dokumentace pro vÙvojÁÒe budou uloÚeny"
" do adresÁÒe, kterÙ si zvolÉte.\n\n"
))
(set #t_aincpath " Kde mÁte uloÚen× sv× includes pro assembler?")
(set #t_aincpathhelp (cat
" Includes pro assembler budou uloÚeny do svÙch podadresÁÒÊ"
" (lvo, devices a libraries) na disku, kterÙ si zvolÉte.\n\n"
))
(set #t_fdpath " Kam si pÒejete uloÚit soubory FD?")
(set #t_fdpathhelp (cat
" FD jsou soubory popisujÉcÉ funkce knihoven a zaÒÉzenÉ"
" PouÚÉvajÉ se s programem 'lvo' a jsou tak× uÚiteÃn×"
" pÒi vytvÁÒenÉ ovladaÃÊ pro hardware.\n\n"
))
(set #t_cincpath " Kde mÁte uloÚen× sv× includes pro C?")
(set #t_cincpathhelp (cat
" Includes pro obecn× C budou uloÚeny do svÙch"
" podadresÁÒÊ (clib, devices a libraries) na disku, kterÙ"
" si zvolÉte.\n\n"
))
(set #t_emodpath " Kde mÁte uloÚen× sv× moduly pro E?")
(set #t_emodpathhhelp (cat
" Moduly pro E budou uloÚeny do sv×ho adresÁÒe a jeho"
" podadresÁÒÊ (devices a libraries) na disku, kterÙ si"
" zvolÉte.\n\n"
))
(set #t_adeincpath " Kam si pÒejete uloÚit includes pro ADE gcc?")
(set #t_adeincpathhelp (cat
" gcc potÒebuje extra soubory k tomu, aby si zjistil, kter×"
" registry vyuÚÉvat pÒi volÁnÉ funkcÉ AHI. Tato informace"
" je obsaÚena v souborech, kter× budou kopÉrovÁny do adresÁÒÊ"
" inline, pragmas a proto.\n\n"
))
(set #t_sasincpath " Kam si pÒejete uloÚit includes pro SAS/C (a DICE)?")
(set #t_sasincpathhelp (cat
" SAS/C (a DICE) potÒebuje extra soubory k tomu, aby si zjistil,"
" kter× registry vyuÚÉvat pÒi volÁnÉ funkcÉ AHI. Tato informace"
" je obsaÚena v souborech, kter× budou kopÉrovÁny do adresÁÒÊ"
" inline, pragmas a proto.\n\n"
))
(set #t_stormincpath " Kam si pÒejete uloÚit includes pro StormC?")
(set #t_stormincpathhelp (cat
" StormC potÒebuje extra soubory k tomu, aby si zjistil, kter×"
" registry vyuÚÉvat pÒi volÁnÉ funkcÉ AHI. Tato informace"
" je obsaÚena v souborech, kter× budou kopÉrovÁny do adresÁÒÊ"
" inline, pragmas a proto.\n\n"
))
(set #t_ahidevhelp (cat
" ahi.device je jÁdrem cel×ho audio"
" syst×mu AHI. Toto je jedinÁ ÃÁst tohoto"
" syst×mu, o kter× 'vÉ' ostatnÉ programy.\n\n"
))
(set #t_runaddmodes (cat
" Bude spuÓtÅn pÒÉkaz AddAudioModes k tomu,"
" aby se obnovila databÁze audio mÏdÊ."
))
(set #t_overwritemode1
" V tomto adresÁÒi jiÚ soubor s popisem audio mÏdu existuje ")
(set #t_overwritemode2 " v ")
(set #t_overwritemode3 (cat
".\n\n"
" SkuteÃnÅ si to pÒejete pÒepsat?"
" VeÓkerÁ zmÅnÅnÁ nastavenÉ budou ztracena!"
))
))
;(if (= @language "svenska")
;( ; Translated by Your Name <your@email.adr>
;))
;**
;** Procedures
;**
(procedure P_INSTDRIVER #pi_audioname #pi_modename
(
(set #pi_drvpath (tackon #devspath "AHI/"))
(set #pi_modepath (tackon #devspath "AudioModes/"))
(if (not (exists #pi_drvpath))
(makedir #pi_drvpath)
)
(if (not (exists #pi_modepath))
(makedir #pi_modepath)
)
(if (exists (tackon "User/Devs/AHI" (cat #pi_audioname #ver68k)))
(
(set #pi_audionamesrc (cat #pi_audioname #ver68k))
)
(
(set #pi_audionamesrc #pi_audioname)
))
(copylib
(help (cat #t_drivershelp @copylib-help))
(prompt (cat #t_installing #pi_drvpath #pi_audionamesrc))
(source (tackon "User/Devs/AHI" #pi_audionamesrc))
(dest #pi_drvpath)
(newname #pi_audioname)
(confirm)
)
(set #pt_copymode 0)
(if (exists (tackon #pi_modepath #pi_modename))
(if (exists (tackon #pi_modepath #pi_modename))
(
; (if (askbool
; (prompt (cat #t_overwritemode1
; #pi_modename
; #t_overwritemode2
; #pi_drvpath
; #t_overwritemode3
; ))
; (default 1)
; (help #t_drivershelp)
; )
; (
(set #pt_copymode 1)
; ))
))
( ; else (exists)
(set #pt_copymode 1)
))
(if (= #pt_copymode 1)
(
(copyfiles
(prompt (cat #t_installing #pi_modepath #pi_modename))
(source (tackon "User/Devs/AudioModes" #pi_modename))
(dest #pi_modepath)
)
))
))
(procedure P_INSTCATALOG #pi_language
(
(set #pi_dest (tackon (tackon #localepath "Catalogs") #pi_language))
(copyfiles
(prompt (cat #t_installing (tackon #pi_dest #pi_language)))
(source (tackon "User/Catalogs" #pi_language))
(dest #pi_dest)
(all)
)
))
;**
;** Main installation procedure starts here...
;**
(set #system 1 ;System files
#prefs 2 ;Preferences program
#audio 4 ;The AHI handler
#userdoc 8 ;User documentation
#a-developer 16 ;App. programmers developer files
#d-developer 32 ;Drv. programmers developer files
)
(set #delfina 1 ;Sound card drivers
#filesave 2
#maestropro 4
#melody 8
#paula 16
#prelude 32
#toccata 64
#wavetools 128
)
(set #devdocs 1 ;Autodocs and programming guidelines
#source 2 ;Example source code
#asm 4 ;Assembler include files
#cgen 8 ;Generic C include files
#e 16 ;E module files
#fd 32 ;FD-files
#ade 64 ;ADE gcc include files
#sas 128 ;SAS/C include files
#storm 256 ;StormC include files
)
;**
;** Make sure we're using a recent version of the installer
;**
(if (< @installer-version (+ (* 43 65536) 3))
(
(if (not (askbool
(prompt #t_oldinstaller)
(help #t_oldinstallerhelp)
))
(
(abort (cat #t_installaborted "\n\n" #t_oldinstallerhelp))
))
))
;**
;** Welcome!
;**
(welcome #t_welcome)
;**
;** Find out which parts should be installed
;**
(set #default 0 #helptext "")
(set #parts 0)
(if (exists "User")
(
(set #helptext (cat #helptext #t_userhelp))
(set #default (bitor #default #system #prefs #audio #userdoc))
)
( ; else
(set #t_system "")
(set #t_prefs "")
(set #t_audio "")
(set #t_userdoc "")
))
(if (exists "Developer")
(
(set #helptext (cat #helptext #t_devhelp))
(set #default (bitor #default #a-developer #d-developer))
)
( ; else
(set #t_a-developer "")
(set #t_d-developer "")
))
(if (= #default 0)
(abort #t_nofiles)
)
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
;**
;** Ask which parts should be installed
;**
(if (= @user-level 0)
(
(set #parts #default)
)
( ; Average or Expert
(set #parts (askoptions
(prompt #t_parts)
(help (cat #helptext @askoptions-help))
(choices #t_system #t_prefs #t_audio #t_userdoc #t_a-developer #t_d-developer)
(default #default)
))
))
;**
;** Which GUI system?
;**
(set #gui_bgui 0 ;Use BGUI
#gui_mui 1 ;Use MUI
)
(set #gui #gui_bgui)
(if (bitand #parts #prefs)
(set #gui (askchoice
(prompt #t_gui)
(help (cat #t_guihelp @askchoice-help))
(choices #t_guibgui #t_guimui)
(default #gui))
)
)
(if (= #gui #gui_bgui)
(set #prefssrc "AHI_BGUI")
)
(if (= #gui #gui_mui)
(set #prefssrc "AHI_MUI")
)
;**
;** Which icon?
;**
(set #icon_std 0
#icon_mwb 1
)
(set #icon #icon_std)
(if (<> (getenv "MagicWB") "")
(set #icon #icon_mwb)
)
(if (bitand #parts (bitor #prefs #audio))
(set #icon (askchoice
(prompt #t_icon)
(help (cat #t_iconhelp @askchoice-help))
(choices #t_iconstd #t_iconmwb)
(default #icon))
)
)
;**
;** Activate the AUDIO handler at boot time?
;**
(set #dosdevpath "Devs:DOSDrivers")
(if (and (bitand #parts #audio) (>= @user-level 1))
(if (not (askbool
(prompt #t_dosdriver)
(help (cat #t_dosdriverhelp @askbool-help))
(default 1)))
(
(set #dosdevpath "SYS:Storage/DOSDrivers")
))
)
;**
;** Ask which languages should be installed
;**
(set #dansk 1
#deutsch 2
#español 4
#français 8
#greek 16
#hrvatski 32
#íslenska 64
#italiano 128
#nederlands 256
#norsk 512
#polski 1024
#português 2048
#srpski 4096
#suomi 8192
#svenska 16384
#ÃeÓtina 32768
)
(set #t_dansk "Dansk"
#t_deutsch "Deutsch"
#t_español "Español"
#t_français "Français"
#t_greek "Greek"
#t_hrvatski "Hrvatski"
#t_íslenska "Íslenska"
#t_italiano "Italiano"
#t_nederlands "Nederlands"
#t_norsk "Norsk"
#t_polski "Polski"
#t_português "Português"
#t_srpski "Srpski"
#t_suomi "Suomi"
#t_svenska "Svenska"
#t_ÃeÓtina "ãeÓtina"
)
(set #default 0)
(if (not (exists "User/Catalogs/dansk")) (set #t_dansk ""))
(if (not (exists "User/Catalogs/deutsch")) (set #t_deutsch ""))
(if (not (exists "User/Catalogs/español")) (set #t_español ""))
(if (not (exists "User/Catalogs/français")) (set #t_français ""))
(if (not (exists "User/Catalogs/greek")) (set #t_greek ""))
(if (not (exists "User/Catalogs/hrvatski")) (set #t_hrvatski ""))
(if (not (exists "User/Catalogs/íslenska")) (set #t_íslenska ""))
(if (not (exists "User/Catalogs/italiano")) (set #t_italiano ""))
(if (not (exists "User/Catalogs/nederlands")) (set #t_nederlands ""))
(if (not (exists "User/Catalogs/norsk")) (set #t_norsk ""))
(if (not (exists "User/Catalogs/polski")) (set #t_polski ""))
(if (not (exists "User/Catalogs/português")) (set #t_português ""))
(if (not (exists "User/Catalogs/srpski")) (set #t_srpski ""))
(if (not (exists "User/Catalogs/suomi")) (set #t_suomi ""))
(if (not (exists "User/Catalogs/svenska")) (set #t_svenska ""))
(if (not (exists "User/Catalogs/ÃeÓtina")) (set #t_ÃeÓtina ""))
(if (and (exists "LOCALE:Languages/dansk.language" (noreq)) (not (= #t_dansk "")))
(set #default (bitor #default #dansk))
)
(if (and (exists "LOCALE:Languages/deutsch.language" (noreq)) (not (= #t_deutsch "")))
(set #default (bitor #default #deutsch))
)
(if (and (exists "LOCALE:Languages/español.language" (noreq)) (not (= #t_español "")))
(set #default (bitor #default #español))
)
(if (and (exists "LOCALE:Languages/français.language" (noreq)) (not (= #t_français "")))
(set #default (bitor #default #français))
)
(if (and (exists "LOCALE:Languages/greek.language" (noreq)) (not (= #t_greek "")))
(set #default (bitor #default #greek))
)
(if (and (exists "LOCALE:Languages/hrvatski.language" (noreq)) (not (= #t_hrvatski "")))
(set #default (bitor #default #hrvatski))
)
(if (and (exists "LOCALE:Languages/íslenska.language" (noreq)) (not (= #t_íslenska "")))
(set #default (bitor #default #íslenska))
)
(if (and (exists "LOCALE:Languages/italiano.language" (noreq)) (not (= #t_italiano "")))
(set #default (bitor #default #italiano))
)
(if (and (exists "LOCALE:Languages/nederlands.language" (noreq)) (not (= #t_nederlands "")))
(set #default (bitor #default #nederlands))
)
(if (and (exists "LOCALE:Languages/norsk.language" (noreq)) (not (= #t_norsk "")))
(set #default (bitor #default #norsk))
)
(if (and (exists "LOCALE:Languages/polski.language" (noreq)) (not (= #t_polski "")))
(set #default (bitor #default #polski))
)
(if (and (exists "LOCALE:Languages/português.language" (noreq)) (not (= #t_portugues "")))
(set #default (bitor #default #portugues))
)
(if (and (exists "LOCALE:Languages/srpski.language" (noreq)) (not (= #t_srpski "")))
(set #default (bitor #default #srpski))
)
(if (and (exists "LOCALE:Languages/suomi.language" (noreq)) (not (= #t_suomi "")))
(set #default (bitor #default #suomi))
)
(if (and (exists "LOCALE:Languages/svenska.language" (noreq)) (not (= #t_svenska "")))
(set #default (bitor #default #svenska))
)
(if (and (exists "LOCALE:Languages/ÃeÓtina.language" (noreq)) (not (= #t_ÃeÓtina "")))
(set #default (bitor #default #ÃeÓtina))
)
(if (bitand #parts (bitor #system #prefs))
(if (= @user-level 0)
(
(set #languages #default)
)
( ; Average or Expert
(set #languages (askoptions
(prompt #t_languages)
(help (cat #t_languageshelp @askoptions-help))
(choices #t_dansk #t_deutsch #t_español #t_français
#t_greek #t_hrvatski #t_íslenska #t_italiano #t_nederlands
#t_norsk #t_polski #t_português #t_srpski
#t_suomi #t_svenska #t_ÃeÓtina)
(default #default)
))
))
)
;**
;** Find out which drivers should be installed (if any)
;**
(set #default #filesave)
(set #drivers 0)
(if (exists "Libs:delfina.library" (noreq))
(set #default (bitor #default #delfina))
)
(if (<> (database "graphics-mem") 0) ; Test for not Draco...
(set #default (bitor #default #paula))
)
(if (exists "Libs:maestix.library" (noreq))
(set #default (bitor #default #maestropro))
)
(if (exists "Libs:prelude.library" (noreq))
(set #default (bitor #default #prelude))
)
(if (exists "Libs:toccata.library" (noreq))
; Don't set if emulation library found!
(if (< (bitand (getversion "Libs:toccata.library") 65535) 1000)
(set #default (bitor #default #toccata))
)
)
(if (exists "Devs:dad_audio.device" (noreq))
(set #default (bitor #default #wavetools))
)
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #parts #system)
(if (= @user-level 0)
(
(set #drivers #default)
)
( ; Average or Expert
(set #drivers (askoptions
(prompt #t_drivers)
(help (cat #t_drivershelp @askoptions-help))
(choices "Delfina" "Filesave" "Maestro Pro" "Melody MPEG" "Paula" "Prelude" "Toccata" "Wavetools")
(default #default)
))
))
)
;**
;** Install 020-versions of the binaries?
;**
(set #ver68k "")
(set #default 1)
(if (patmatch "68000|68010" (database "cpu"))
(
(set #default 0)
))
(if (patmatch "68060" (database "cpu"))
(
(set #default 2)
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (and (bitand #parts #system) (>= @user-level 1))
(set #default (askchoice
(prompt #t_CPUver)
(help (cat #t_CPUverhelp @askbool-help))
(choices "68000" "68020-68040" "68060")
(default #default)))
)
(if (= #default 0)
(
(set #ver68k ".000")
))
(if (= #default 2)
(
(set #ver68k ".060")
))
;**
;** Find out which developer files should be installed
;**
(set #default (bitor #devdocs #source #asm #cgen #fd))
(set #devfiles 0)
(if (exists "ADE:" (noreq))
(set #default (bitor #default #ade))
)
(if (exists "SC:" (noreq))
(set #default (bitor #default #sas))
)
(if (exists "STORMC:" (noreq))
(set #default (bitor #default #storm))
)
(if (exists "EMODULES:" (noreq))
(set #default (bitor #default #e))
)
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #parts (bitor #a-developer #d-developer))
(
(if (= @user-level 0)
(
(set #devfiles #default)
)
( ; Average or Expert
(set #devfiles (askoptions
(prompt #t_devfiles)
(help (cat #t_devfileshelp @askoptions-help))
(choices #t_devdocs #t_source #t_asm #t_cgen #t_e #t_fd #t_ade #t_sas #t_storm )
(default #default)
))
))
))
;**
;** Find out where the files should be installed
;**
(set #devspath "Devs:")
(set #cpath "C:")
(set #prefspath "SYS:Prefs/")
(set #lpath "L:")
(set #localepath "Locale:")
(set #incpath @default-dest)
(set #adeincpath "ADE:include/")
(set #sasincpath "Include:")
(set #stormincpath "StormC:Include")
(set #fdpath "FD:")
(set #emodpath "EMODULES:")
(if (exists #devspath (noreq)) (set #devspath (expandpath #devspath)))
(if (exists #cpath (noreq)) (set #cpath (expandpath #cpath)))
(if (exists #prefspath (noreq)) (set #prefspath (expandpath #prefspath)))
(if (exists #lpath (noreq)) (set #lpath (expandpath #lpath)))
(if (exists #localepath (noreq)) (set #localepath (expandpath #localepath)))
(if (not (exists "Help:" (noreq)))
(
(if (bitand #parts #prefs)
(set #userdocpath #prefspath)
(set #userdocpath @default-dest)
)
)
(
(if (>= #osversion 38)
(
(set #userdocpath "Help:")
))
))
(if (bitand #devfiles #ade)
(
(set #incpath "ADE:os-include/")
))
(if (exists "Include:" (noreq))
(
(set #incpath "Include:")
))
(if (= @user-level 0)
(
(if (and (bitand #parts #system) (not (exists #devspath (noreq))))
(
(abort #t_nodevs)
))
(if (and (bitand #parts #system) (not (exists #cpath (noreq))))
(
(abort #t_noc)
))
(if (and (bitand #parts #prefs) (not (exists #prefspath (noreq))))
(
(abort #t_noprefs)
))
(if (and (bitand #parts #audio) (not (exists #lpath (noreq))))
(
(abort #t_nol)
))
(set #srcpath (tackon @default-dest "AHI/"))
(if (exists #srcpath)
(
(delete #srcpath
(all)
(optional "force")
)
))
(set #devdocspath (tackon #srcpath "docs/"))
(if (= #userdocpath @default-dest)
(
(set #userdocpath #devdocspath)
))
(if (= #incpath @default-dest)
(
(set #incpath (tackon #srcpath "include/"))
))
(set #aincpath #incpath)
(set #cincpath #incpath)
(if (not (exists #sasincpath (noreq)))
(
(set #sasincpath #cincpath)
))
(if (not (exists #stormincpath (noreq)))
(
(set #stormincpath #cincpath)
))
(if (not (exists #fdpath (noreq)))
(
(set #fdpath (tackon #incpath "fd/"))
))
(if (not (exists #emodpath (noreq)))
(
(set #emodpath #cincpath)
))
(makedir #srcpath (infos))
(set @default-dest #srcpath)
; Match the number of completes in the 'else' section...
(complete (/ #complete 10)) (set #complete (+ #complete (* 15 #completeadd)))
)
( ; Average or Expert
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (and (bitand #parts #system)
(or (not (exists #devspath (noreq))) (= @user-level 2) ))
(
(set #devspath (askdir
(prompt #t_devspath)
(help (cat #t_devspathhelp @askdir-help))
(default #devspath)
))
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (and (bitand #parts #system)
(or (not (exists #cpath (noreq))) (= @user-level 2) ))
(
(set #cpath (askdir
(prompt #t_cpath)
(help (cat #t_cpathhelp @askdir-help))
(default #cpath)
))
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (and (<> #languages 0)
(or (not (exists #localepath (noreq))) (= @user-level 2) ))
(
(set #localepath (askdir
(prompt #t_localepath)
(help (cat #t_localepathhelp @askdir-help))
(default #localepath)
))
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (and (bitand #parts #prefs)
(or (not (exists #prefspath (noreq))) (= @user-level 2) ))
(
(set #prefspath (askdir
(prompt #t_prefspath)
(help (cat #t_prefspathhelp @askdir-help))
(default #prefspath)
))
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (and (bitand #parts #audio)
(or (not (exists #lpath (noreq))) (= @user-level 2) ))
(
(set #lpath (askdir
(prompt #t_lpath)
(help (cat #t_lpathhelp @askdir-help))
(default #lpath)
))
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (and (bitand #parts #audio)
(or (not (exists #dosdevpath (noreq))) (= @user-level 2) ))
(
(set #dosdevpath (askdir
(prompt #t_dosdevpath)
(help (cat #t_dosdevpathhelp @askdir-help))
(default #dosdevpath)
))
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (and (bitand #parts #userdoc)
(or (= #userdocpath @default-dest) (= @user-level 2) ))
(
(set #userdocpath (askdir
(prompt #t_userdocpath)
(help (cat #t_userdocpathhelp @askdir-help))
(default #userdocpath)
))
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #devfiles #source)
(
(set #srcpath (askdir
(prompt #t_srcpath)
(help (cat #t_srcpathhelp @askdir-help))
(default @default-dest)
))
(set #srcpath (tackon #srcpath "AHI/"))
(if (exists #srcpath)
(
(delete #srcpath
(all)
(confirm average)
(optional "force")
(prompt #t_oldsrc)
(help #t_nohelp)
)
))
(makedir #srcpath (infos))
(set @default-dest #srcpath)
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #devfiles #devdocs)
(
(set #devdocspath (askdir
(prompt #t_devdocspath)
(help (cat #t_devdocspathhelp @askdir-help))
(default (tackon @default-dest "docs/"))
(newpath)
))
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #devfiles #asm)
(
(set #aincpath (askdir
(prompt #t_aincpath)
(help (cat #t_aincpathhelp @askdir-help))
(default #incpath)
))
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #devfiles #fd)
(
(if (not (exists #fdpath (noreq)))
(
(set #fdpath (tackon #incpath "fd/"))
))
(set #fdpath (askdir
(prompt #t_fdpath)
(help (cat #t_fdpathhelp @askdir-help))
(default #fdpath)
))
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #devfiles #cgen)
(
(set #cincpath (askdir
(prompt #t_cincpath)
(help (cat #t_cincpathhelp @askdir-help))
(default #incpath)
))
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #devfiles #e)
(
(set #emodpath (askdir
(prompt #t_emodpath)
(help (cat #t_emodpathhelp @askdir-help))
(default #emodpath)
))
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #devfiles #ade)
(
(set #adeincpath (askdir
(prompt #t_adeincpath)
(help (cat #t_adeincpathhelp @askdir-help))
(default #adeincpath)
))
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #devfiles #sas)
(
(set #sasincpath (askdir
(prompt #t_sasincpath)
(help (cat #t_sasincpathhelp @askdir-help))
(default #sasincpath)
))
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #devfiles #storm)
(
(set #stormincpath (askdir
(prompt #t_stormincpath)
(help (cat #t_stormincpathhelp @askdir-help))
(default #stormincpath)
))
))
))
;******************************************************************************
;**** Install *****************************************************************
;******************************************************************************
;**
;** Install the prefs program
;**
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #parts #prefs)
(
; No version checking, so user can change gui version
(copyfiles
(help (cat #t_prefspathhelp @copylib-help))
(prompt #t_installing "AHI")
(source (tackon "User/Prefs" #prefssrc))
(dest #prefspath)
(newname "AHI")
(confirm)
)
(protect (tackon #prefspath "AHI") "+e")
(if (= #icon #icon_std)
(set #iconsrc "AHI.info")
)
(if (= #icon #icon_mwb)
(set #iconsrc "AHI.MWB.info")
)
(copyfiles
(help (cat #t_prefspathhelp @copylib-help))
(prompt #t_installing "AHI")
(source (tackon "User/Prefs" #iconsrc))
(dest #prefspath)
(newname "AHI.info")
(confirm)
(noposition)
)
(set @default-dest #prefspath)
))
;**
;** Install the audio handler
;**
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #parts #audio)
(
(copylib
(help (cat #t_lpathhelp @copylib-help))
(prompt #t_installing "AHI-Handler")
(source "User/L/AHI-Handler")
(dest #lpath)
(confirm)
)
(protect (tackon #lpath "AHI-Handler") "+e")
(copylib
(help (cat #t_dosdevpathhelp @copylib-help))
(prompt #t_installing "AUDIO")
(source "User/Devs/DOSDrivers/AUDIO")
(dest #dosdevpath)
(confirm)
)
(if (= #icon #icon_std)
(set #iconsrc "AUDIO.info")
)
(if (= #icon #icon_mwb)
(set #iconsrc "AUDIO.MWB.info")
)
(copyfiles
(help (cat #t_dosdevpathhelp @copylib-help))
(prompt #t_installing "AUDIO")
(source (tackon "User/Devs/DOSDrivers" #iconsrc))
(dest #dosdevpath)
(newname "AUDIO.info")
(confirm)
(noposition)
)
(set @default-dest #lpath)
))
;**
;** Install the user documentation
;**
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #parts #userdoc)
(
(copyfiles
(help (cat #t_userdocpathhelp @copylib-help))
(prompt #t_installing "ahi.guide")
(source "User/Help/ahi.guide")
(dest #userdocpath)
(infos)
(noposition)
)
(set @default-dest #userdocpath)
))
;**
;** Install ahi.device, AddAudioModes and drivers
;**
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #parts #system)
(
;** ahi.device
(copylib
(help (cat #t_ahidevhelp @copylib-help))
(prompt (cat #t_installing "ahi.device" #ver68k))
(source (cat "User/Devs/ahi.device" #ver68k))
(dest #devspath)
(newname "ahi.device")
(confirm)
)
;** AddAudioModes
(copylib
(help (cat #t_cpathhelp @copylib-help))
(prompt #t_installing "AddAudioModes")
(source "User/C/AddAudioModes")
(dest #cpath)
(confirm)
)
(protect (tackon #cpath "AddAudioModes") "+e")
;** Drivers
(if (bitand #drivers #delfina)
(P_INSTDRIVER "delfina.audio" "DELFINA")
)
(if (bitand #drivers #filesave)
(P_INSTDRIVER "filesave.audio" "FILESAVE")
)
(if (bitand #drivers #maestropro)
(P_INSTDRIVER "maestropro.audio" "MAESTROPRO")
)
(if (bitand #drivers #melody)
(P_INSTDRIVER "melody.audio" "MELODY")
)
(if (bitand #drivers #paula)
(P_INSTDRIVER "paula.audio" "PAULA")
)
(if (bitand #drivers #prelude)
(P_INSTDRIVER "prelude.audio" "PRELUDE")
)
(if (bitand #drivers #toccata)
(P_INSTDRIVER "toccata.audio" "TOCCATA")
)
(if (bitand #drivers #wavetools)
(P_INSTDRIVER "wavetools.audio" "WAVETOOLS")
)
(run (cat (tackon #cpath "AddAudioModes") " REMOVE")
(prompt #t_runaddmodes)
(help #t_nohelp)
(confirm)
)
(set @default-dest #devspath)
))
;**
;** Install the catalogs
;**
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #parts (bitor #system #prefs))
(
;** Catalogs
(if (bitand #languages #dansk)
(P_INSTCATALOG #t_dansk)
)
(if (bitand #languages #deutsch)
(P_INSTCATALOG #t_deutsch)
)
(if (bitand #languages #español)
(P_INSTCATALOG #t_español)
)
(if (bitand #languages #français)
(P_INSTCATALOG #t_français)
)
(if (bitand #languages #greek)
(P_INSTCATALOG #t_greek)
)
(if (bitand #languages #hrvatski)
(P_INSTCATALOG #t_hrvatski)
)
(if (bitand #languages #íslenska)
(P_INSTCATALOG #t_íslenska)
)
(if (bitand #languages #italiano)
(P_INSTCATALOG #t_italiano)
)
(if (bitand #languages #nederlands)
(P_INSTCATALOG #t_nederlands)
)
(if (bitand #languages #norsk)
(P_INSTCATALOG #t_norsk)
)
(if (bitand #languages #polski)
(P_INSTCATALOG #t_polski)
)
(if (bitand #languages #português)
(P_INSTCATALOG #t_português)
)
(if (bitand #languages #srpski)
(P_INSTCATALOG #t_srpski)
)
(if (bitand #languages #suomi)
(P_INSTCATALOG #t_suomi)
)
(if (bitand #languages #svenska)
(P_INSTCATALOG #t_svenska)
)
(if (bitand #languages #ÃeÓtina)
(P_INSTCATALOG #t_ÃeÓtina)
)
))
;**
;** Install the autodocs
;**
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #devfiles #devdocs)
(
(if (bitand #parts #a-developer)
(set #pattern "~(#?sub#?)"))
(if (bitand #parts #d-developer)
(set #pattern "(#?sub#?)"))
(if (and (bitand #parts #a-developer) (bitand #parts #d-developer))
(set #pattern "#?"))
(makedir #devdocspath)
(copyfiles
(help @copylib-help)
(prompt #t_installingdocs )
(source "Developer/docs/")
(dest #devdocspath)
(pattern #pattern)
(confirm average)
(infos)
(noposition)
)
(set @default-dest #devdocspath)
))
;**
;** Install the include files
;**
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #devfiles #fd)
(
(copyfiles
(help @copylib-help)
(prompt #t_installingincs)
(source "Developer/Include/FD")
(dest #fdpath)
(all)
)
(set @default-dest #fdpath)
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #devfiles #asm)
(
(copyfiles
(help @copylib-help)
(prompt #t_installingincs)
(source "Developer/include/Asm")
(dest #aincpath)
(all)
)
(set @default-dest #aincpath)
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #devfiles #cgen)
(
(copyfiles
(help @copylib-help)
(prompt #t_installingincs)
(source "Developer/Include/C")
(dest #cincpath)
(all)
)
(set @default-dest #cincpath)
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #devfiles #e)
(
(copyfiles
(help @copylib-help)
(prompt #t_installingincs)
(source "Developer/Include/E")
(dest #emodpath)
(all)
)
(set @default-dest #emodpath)
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #devfiles #ade)
(
(copyfiles
(help @copylib-help)
(prompt #t_installingincs)
(source "Developer/Include/ADE")
(dest #adeincpath)
(all)
)
(set @default-dest #adeincpath)
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #devfiles #sas)
(
(copyfiles
(help @copylib-help)
(prompt #t_installingincs)
(source "Developer/Include/SAS")
(dest #sasincpath)
(all)
)
(set @default-dest #sasincpath)
))
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #devfiles #storm)
(
(copyfiles
(help @copylib-help)
(prompt #t_installingincs)
(source "Developer/Include/Storm")
(dest #stormincpath)
(all)
)
(set @default-dest #stormincpath)
))
;**
;** Install the examples
;**
(complete (/ #complete 10)) (set #complete (+ #complete #completeadd))
(if (bitand #devfiles #source)
(
(if (bitand #parts #a-developer)
(
(makedir (tackon #srcpath "examples/"))
(copyfiles
(help @copylib-help)
(prompt #t_installingsrc)
(source "Developer/examples")
(dest (tackon #srcpath "examples/"))
(all)
)
))
(if (bitand #parts #d-developer)
(
(makedir (tackon #srcpath "drivers/"))
(copyfiles
(help @copylib-help)
(prompt #t_installingsrc)
(source "Developer/drivers")
(dest (tackon #srcpath "drivers/"))
(all)
)
(makedir (tackon #srcpath "support/"))
(copyfiles
(help @copylib-help)
(prompt #t_installingsrc)
(source "Developer/support")
(dest (tackon #srcpath "support/"))
(all)
)
))
(if (bitand #parts (bitor #a-developer #d-developer))
(
(copyfiles
(help @copylib-help)
(prompt #t_installingsrc)
(source "")
(dest #srcpath)
(pattern "(COPYRIGHT|HISTORY|VERSION|ahi.readme)#?")
)
))
(set @default-dest #srcpath)
))
(complete 100)
(exit)